|
100
|
How do I specify the indentation of the child items relative to their parents
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Indent = 11
oPropertiesList.Select(oPropertiesList)
oPropertiesList.ExpandAll()
|
|
99
|
How do I get the a property based on its identifier
Dim oPropertiesList as P
Dim var_Property as local
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BeginUpdate()
oPropertiesList.Add("Root","",-1)
' oPropertiesList.Add("Child 1",1,1,,"Root").ID = 1234
var_Property = oPropertiesList.Add("Child 1",1,1,,"Root")
oPropertiesList.TemplateDef = "dim var_Property"
oPropertiesList.TemplateDef = var_Property
oPropertiesList.Template = "var_Property.ID = 1234"
oPropertiesList.Add("Child 2",2,1,,"Root")
oPropertiesList.Template = "ExpandItem(`Root`) = True" // oPropertiesList.ExpandItem("Root") = .t.
oPropertiesList.Add("Property",oPropertiesList.Property(1234).Name,-1)
oPropertiesList.EndUpdate()
|
|
98
|
How do I get the a property based on its index
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BeginUpdate()
oPropertiesList.Add("Root","",-1)
oPropertiesList.Add("Child 1",1,1,,"Root")
oPropertiesList.Add("Child 2",2,1,,"Root")
oPropertiesList.Template = "ExpandItem(`Root`) = True" // oPropertiesList.ExpandItem("Root") = .t.
oPropertiesList.Add("Item",oPropertiesList.Item(1).Name,-1)
oPropertiesList.EndUpdate()
|
|
97
|
How do I get the number or count of the properties being listed
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BeginUpdate()
oPropertiesList.Add("Root","",-1)
oPropertiesList.Add("Child 1",1,1,,"Root")
oPropertiesList.Add("Child 2",2,1,,"Root")
oPropertiesList.Template = "ExpandItem(`Root`) = True" // oPropertiesList.ExpandItem("Root") = .t.
oPropertiesList.Add("Count",oPropertiesList.Count,-1)
oPropertiesList.EndUpdate()
|
|
96
|
How do I change the name or the caption for a column
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HeaderVisible = .t.
oPropertiesList.Template = "ColumnCaption(0) = `Properties`" // oPropertiesList.ColumnCaption(0) = "Properties"
oPropertiesList.Select(oPropertiesList)
|
|
95
|
How do I expand a property
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BeginUpdate()
oPropertiesList.Add("Root","",-1)
oPropertiesList.Add("Child 1",1,1,,"Root")
oPropertiesList.Add("Child 2",2,1,,"Root")
oPropertiesList.Template = "ExpandItem(`Root`) = True" // oPropertiesList.ExpandItem("Root") = .t.
oPropertiesList.EndUpdate()
|
|
94
|
How do I change the width for a column
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ColumnWidth(1) = 48" // oPropertiesList.ColumnWidth(1) = 48
oPropertiesList.Select(oPropertiesList)
|
|
93
|
How do I clear or remove all properties
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("First","A",1)
oPropertiesList.Clear()
oPropertiesList.Refresh()
|
|
92
|
How do I remove a property
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("First","A",1)
oPropertiesList.Remove("First")
oPropertiesList.Refresh()
|
|
91
|
How do I add a property
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Refresh()
|
|
90
|
How do I change the visual aspect description's spliter, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.Template = "Background(0) = 16777216" // oPropertiesList.Background(0) = 16777216
oPropertiesList.Select(oPropertiesList)
|
|
89
|
How do I change the visual aspect for thumb parts in the scroll bars, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
oPropertiesList.Template = "Background(388) = 16777216" // oPropertiesList.Background(388) = 16777216
oPropertiesList.Template = "Background(389) = 33554432" // oPropertiesList.Background(389) = 33554432
oPropertiesList.Template = "Background(391) = 50331648" // oPropertiesList.Background(391) = 50331648
oPropertiesList.Template = "Background(260) = 16777216" // oPropertiesList.Background(260) = 16777216
oPropertiesList.Template = "Background(261) = 33554432" // oPropertiesList.Background(261) = 33554432
oPropertiesList.Template = "Background(263) = 50331648" // oPropertiesList.Background(263) = 50331648
oPropertiesList.Select(oPropertiesList)
|
|
88
|
I've seen that you can change the visual appearance for the scroll bar. How can I do that
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.VisualAppearance.Add(3,"c:\exontrol\images\hot.ebn")
oPropertiesList.Template = "Background(324) = 16777216" // oPropertiesList.Background(324) = 16777216
oPropertiesList.Template = "Background(325) = 33554432" // oPropertiesList.Background(325) = 33554432
oPropertiesList.Template = "Background(327) = 50331648" // oPropertiesList.Background(327) = 50331648
oPropertiesList.Template = "Background(404) = 15790320" // oPropertiesList.Background(404) = 15790320
oPropertiesList.Template = "Background(276) = 15790320" // oPropertiesList.Background(276) = 15790320
oPropertiesList.Template = "Background(511) = 15790320" // oPropertiesList.Background(511) = 15790320
oPropertiesList.HeaderVisible = .t.
oPropertiesList.ColumnAutoResize = .f.
oPropertiesList.Select(oPropertiesList)
|
|
87
|
Can I change the forecolor for the tooltip
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 1
oPropertiesList.ToolTipWidth = 364
oPropertiesList.Template = "Background(66) = 255" // oPropertiesList.Background(66) = 255
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
86
|
Can I change the background color for the tooltip
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 1
oPropertiesList.ToolTipWidth = 364
oPropertiesList.Template = "Background(65) = 255" // oPropertiesList.Background(65) = 255
oPropertiesList.Select(oPropertiesList)
oPropertiesList.AllowTooltip = .t.
|
|
85
|
Can I change the default border of the tooltip, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 1
oPropertiesList.ToolTipWidth = 364
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.Template = "Background(64) = 16777216" // oPropertiesList.Background(64) = 16777216
oPropertiesList.Select(oPropertiesList)
oPropertiesList.AllowTooltip = .t.
|
|
84
|
Is there any option to highligth the column from the cursor - point
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.Template = "Background(32) = 16777216" // oPropertiesList.Background(32) = 16777216
oPropertiesList.HeaderVisible = .t.
|
|
83
|
How can change the visual appearance for the spin control, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.Template = "Background(22) = 16777216" // oPropertiesList.Background(22) = 16777216
oPropertiesList.Template = "Background(23) = 33554432" // oPropertiesList.Background(23) = 33554432
oPropertiesList.Template = "Background(24) = 16777216" // oPropertiesList.Background(24) = 16777216
oPropertiesList.Template = "Background(25) = 33554432" // oPropertiesList.Background(25) = 33554432
oPropertiesList.AllowSpin = .t.
oPropertiesList.Add("Spin",50,1)
oPropertiesList.Refresh()
|
|
82
|
How can change the visual appearance for the slider or track bar, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.Template = "Background(16) = 16777216" // oPropertiesList.Background(16) = 16777216
oPropertiesList.Template = "Background(15) = 13816530" // oPropertiesList.Background(15) = 13816530
oPropertiesList.Add("Slider",50,16)
oPropertiesList.Refresh()
|
|
81
|
How do I change the visual aspect of the drop down calendar window, that shows up if I click the drop down filter button, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.Template = "Background(8) = 16777216" // oPropertiesList.Background(8) = 16777216
oPropertiesList.Template = "Background(9) = 16777216" // oPropertiesList.Background(9) = 16777216
oPropertiesList.Template = "Background(10) = 33554432" // oPropertiesList.Background(10) = 33554432
oPropertiesList.Template = "Background(11) = 16777216" // oPropertiesList.Background(11) = 16777216
oPropertiesList.Template = "Background(12) = 15132390" // oPropertiesList.Background(12) = 15132390
oPropertiesList.Template = "Background(13) = 15132390" // oPropertiesList.Background(13) = 15132390
oPropertiesList.Template = "Background(14) = 16777216" // oPropertiesList.Background(14) = 16777216
oPropertiesList.Add("Date","1/1/2001",9)
oPropertiesList.Refresh()
|
|
80
|
How can change the visual appearance for the button that are visible inside the editors, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.Template = "Background(7) = 16777216" // oPropertiesList.Background(7) = 16777216
oPropertiesList.Template = "Background(6) = 33554432" // oPropertiesList.Background(6) = 33554432
oPropertiesList.Select(oPropertiesList)
|
|
79
|
How can change the visual appearance for the button that shows the drop down editors, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.Template = "Background(4) = 16777216" // oPropertiesList.Background(4) = 16777216
oPropertiesList.Template = "Background(5) = 33554432" // oPropertiesList.Background(5) = 33554432
oPropertiesList.Select(oPropertiesList)
|
|
78
|
Can I change the order of the buttons in the scroll bar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollOrderParts(1) = `t,l,r`" // oPropertiesList.ScrollOrderParts(1) = "t,l,r"
oPropertiesList.Template = "ScrollOrderParts(0) = `t,l,r`" // oPropertiesList.ScrollOrderParts(0) = "t,l,r"
oPropertiesList.Select(oPropertiesList)
|
|
77
|
The thumb size seems to be very small. Can I make it bigger
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollThumbSize(0) = 128" // oPropertiesList.ScrollThumbSize(0) = 128
oPropertiesList.Select(oPropertiesList)
|
|
76
|
How do I enlarge or change the size of the control's scrollbars
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ScrollHeight = 18
oPropertiesList.ScrollWidth = 18
oPropertiesList.ScrollButtonWidth = 18
oPropertiesList.ScrollButtonHeight = 18
oPropertiesList.Select(oPropertiesList)
|
|
75
|
How can I display my text on the scroll bar, using a different font
Dim oPropertiesList as P
Dim var_StdFont as local
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollPartCaption(0,256) = `This is just a text`" // oPropertiesList.ScrollPartCaption(0,256) = "This is just a text"
' oPropertiesList.ScrollFont(0).Size = 12
var_StdFont = oPropertiesList.ScrollFont(0)
oPropertiesList.TemplateDef = "dim var_StdFont"
oPropertiesList.TemplateDef = var_StdFont
oPropertiesList.Template = "var_StdFont.Size = 12"
oPropertiesList.Select(oPropertiesList)
|
|
74
|
How can I display my text on the scroll bar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollPartCaption(0,256) = `this is just a text`" // oPropertiesList.ScrollPartCaption(0,256) = "this is just a text"
oPropertiesList.Select(oPropertiesList)
|
|
73
|
How do I assign a tooltip to a scrollbar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollToolTip(0) = `This is a tooltip being shown when you click and drag the thumb in the vertical scroll bar`" // oPropertiesList.ScrollToolTip(0) = "This is a tooltip being shown when you click and drag the thumb in the vertical scroll bar"
oPropertiesList.Select(oPropertiesList)
|
|
72
|
How do I assign an icon to the button in the scrollbar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oPropertiesList.Template = "ScrollPartVisible(0,32768) = True" // oPropertiesList.ScrollPartVisible(0,32768) = .t.
oPropertiesList.Template = "ScrollPartCaption(0,32768) = `<img>1</img>`" // oPropertiesList.ScrollPartCaption(0,32768) = "<img>1</img>"
oPropertiesList.ScrollHeight = 18
oPropertiesList.ScrollButtonWidth = 18
oPropertiesList.Select(oPropertiesList)
|
|
71
|
I need to add a button in the scroll bar. Is this possible
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollPartVisible(0,32768) = True" // oPropertiesList.ScrollPartVisible(0,32768) = .t.
oPropertiesList.Template = "ScrollPartCaption(0,32768) = `1`" // oPropertiesList.ScrollPartCaption(0,32768) = "1"
oPropertiesList.Select(oPropertiesList)
|
|
70
|
Can I display an additional buttons in the scroll bar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "ScrollPartVisible(0,32768) = True" // oPropertiesList.ScrollPartVisible(0,32768) = .t.
oPropertiesList.Template = "ScrollPartVisible(0,16384) = True" // oPropertiesList.ScrollPartVisible(0,16384) = .t.
oPropertiesList.Template = "ScrollPartVisible(0,1) = True" // oPropertiesList.ScrollPartVisible(0,1) = .t.
oPropertiesList.Template = "ScrollPartVisible(0,2) = True" // oPropertiesList.ScrollPartVisible(0,2) = .t.
oPropertiesList.Select(oPropertiesList)
|
|
69
|
Can I change the font for the tooltip
Dim oPropertiesList as P
Dim var_StdFont as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 1
var_StdFont = oPropertiesList.ToolTipFont
var_StdFont.Name = "Tahoma"
var_StdFont.Size = 14
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
68
|
How do I call your x-script language
Dim oPropertiesList as P
Dim var_Property as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
var_Property = oPropertiesList.ExecuteTemplate("Add(`Bold`,1,1)")
var_Property.Bold = .t.
|
|
67
|
How do I disable sorting the columns when clicking the control's header
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.SortOnClick = 0
oPropertiesList.HeaderVisible = .t.
oPropertiesList.Select(oPropertiesList)
|
|
66
|
Can I use your EBN files to change the visual appearance for +/- expand - collapse buttons
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.VisualAppearance.Add(2,"c:\exontrol\images\pushed.ebn")
oPropertiesList.HasButtons = 4
oPropertiesList.Template = "HasButtonsCustom(0) = 16777216" // oPropertiesList.HasButtonsCustom(.f.) = 16777216
oPropertiesList.Template = "HasButtonsCustom(1) = 33554432" // oPropertiesList.HasButtonsCustom(.t.) = 33554432
oPropertiesList.Select(oPropertiesList)
|
|
65
|
Can I use my own icons for the +/- ( expand/collapse ) buttons
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oPropertiesList.HasButtons = 4
oPropertiesList.Template = "HasButtonsCustom(0) = 1" // oPropertiesList.HasButtonsCustom(.f.) = 1
oPropertiesList.Template = "HasButtonsCustom(1) = 2" // oPropertiesList.HasButtonsCustom(.t.) = 2
oPropertiesList.Select(oPropertiesList)
|
|
64
|
How do I change visual appearance of the +/- ( expand/collapse ) buttons
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HasButtons = 3
oPropertiesList.Select(oPropertiesList)
|
|
63
|
How do I browse or select for a com or net object
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.SelectedObject = oPropertiesList
|
|
62
|
How do I expand all properties
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Select(oPropertiesList)
oPropertiesList.ExpandAll()
|
|
61
|
How do I enable resizing the columns at runtime
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ColumnsAllowSizing = .t.
oPropertiesList.Select(oPropertiesList)
|
|
60
|
How do I call your x-script language
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Template = "Add(`First`,1,1)"
|
|
59
|
How can I enable or disable the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Enabled = .f.
oPropertiesList.Select(oPropertiesList)
|
|
58
|
I've seen that the width of the tooltip is variable. Can I make it larger
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipWidth = 328
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
57
|
How do I disable showing the tooltip for all control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 0
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
56
|
How do I let the tooltip being displayed longer
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipPopDelay = 10000
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
55
|
How do I show the tooltip quicker
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ToolTipDelay = 1
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
54
|
How do I get the handle of the control's window
Dim oPropertiesList as P
Dim var_hWnd as
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
var_hWnd = oPropertiesList.hWnd
|
|
53
|
How do I show alternate rows in different background color
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BackColorAlternate = 15790320
oPropertiesList.Select(oPropertiesList)
|
|
52
|
How do enable or disable tooltips
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.AllowTooltip = .t.
oPropertiesList.Select(oPropertiesList)
|
|
51
|
How do change the foreground color for the control's header bar, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HeaderVisible = .t.
oPropertiesList.ForeColorHeader = 255
|
|
50
|
How do change the visual appearance for the control's header bar, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HeaderVisible = .t.
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.BackColorHeader = 16777216
|
|
49
|
How do I change the foreground color for the description part in the bottom side of the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ForeColorDescription = 255
oPropertiesList.Select(oPropertiesList)
|
|
48
|
How do I change the visual appearance for the description part in the bottom side of the control, using your EBN files
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.BackColorDescription = 16777216
|
|
47
|
How do I change the background color for the description part in the bottom side of the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BackColorDescription = 255
|
|
46
|
Is there any option to specify the height of the items, before adding them
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.DefaultItemHeight = 13
oPropertiesList.Select(oPropertiesList)
|
|
45
|
How do I show or hide the connection between categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.MarkCategories = .t.
oPropertiesList.LinkCategories = .f.
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
44
|
How do I show or hide the categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.MarkCategories = .t.
oPropertiesList.MarkLineColor = 255
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
43
|
How do I change the foreground color for categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ForeColorCategories = 255
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
42
|
How do I change the background color for categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BackColorCategories = 255
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
41
|
How do I sort the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Select(oPropertiesList)
oPropertiesList.Sort(.f.)
|
|
40
|
Is there any option to change the color for the grid lines
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HasGridLines = -1
oPropertiesList.GridLineColor = 255
oPropertiesList.Select(oPropertiesList)
|
|
39
|
How do I specify the default category
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.DefaultCategory = "Font"
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
38
|
How do I show or hide the categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.MarkCategories = .f.
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
37
|
How do I get a property based on its name
Dim oPropertiesList as P
Dim var_Property as local
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
' oPropertiesList.Add("First Name","Mihai",1).ID = 100
var_Property = oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.TemplateDef = "dim var_Property"
oPropertiesList.TemplateDef = var_Property
oPropertiesList.Template = "var_Property.ID = 100"
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property(100)
oPropertiesList.Refresh()
|
|
36
|
How do I get a property based on its name
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property("Last Name")
oPropertiesList.Refresh()
|
|
35
|
How do I maintain performance while making several changes
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BeginUpdate()
oPropertiesList.Add("First",1,1)
oPropertiesList.Add("Second",1,1)
oPropertiesList.EndUpdate()
|
|
34
|
How can I get a list of interfaces that an object implements
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
? oPropertiesList.Interfaces(oPropertiesList)
|
|
33
|
How can I display something else when including the elements of a collection
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowObjects = .t.
oPropertiesList.ShowItemsCollection = .t.
oPropertiesList.NameItemsCollection = "Name;Caption;Item;Index"
oPropertiesList.Select(oPropertiesList)
|
|
32
|
How can I include the elements of a collection
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowObjects = .t.
oPropertiesList.ShowItemsCollection = .t.
oPropertiesList.Select(oPropertiesList)
|
|
31
|
How can I use a spin control to edit numeric values
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.AllowSpin = .t.
oPropertiesList.Select(oPropertiesList)
|
|
30
|
How can I change the control's font
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Font.Name = "Tahoma"
oPropertiesList.Select(oPropertiesList)
|
|
29
|
How do I show or hide the variables of an object like Font
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowVariables = .t.
oPropertiesList.Select(oPropertiesList.Font)
|
|
28
|
How do I show or hide the categories
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowCategories = .t.
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
27
|
How do I refresh the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.Refresh()
|
|
26
|
How can still display the selected items when the control loses the focus
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HideSelection = .f.
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property("Last Name")
oPropertiesList.Refresh()
|
|
25
|
How do I change the visual appearance effect for the selected item, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.SelBackColor = 16777216
oPropertiesList.SelForeColor = 0
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property("Last Name")
oPropertiesList.Refresh()
|
|
24
|
How do I change the colors for the selected item
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.SelBackColor = 0
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property("Last Name")
oPropertiesList.Refresh()
|
|
23
|
How do I show or hide the non browseable members
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowNonBrowsable = .t.
oPropertiesList.Select(oPropertiesList)
|
|
22
|
How can I hide or show the object's property pages
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowPropertyPages = .f.
oPropertiesList.Select(oPropertiesList)
|
|
21
|
How do I filter properties when loading
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.FireIncludeProperty = .t.
|
|
20
|
How do I get or set the selected property
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Add("First Name","Mihai",1)
oPropertiesList.Add("Last Name","Filimon",1)
oPropertiesList.SelectedProperty = oPropertiesList.Property("Last Name")
oPropertiesList.Refresh()
|
|
19
|
How do I remove "Invalid property value." message
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.InvalidValueMessage = ""
oPropertiesList.Select(oPropertiesList)
|
|
18
|
How do I change the "Invalid property value." message
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.InvalidValueMessage = "new message"
oPropertiesList.Select(oPropertiesList)
|
|
17
|
How do I edit a property as soon as the user selects it
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.EditOnSelect = .t.
oPropertiesList.Select(oPropertiesList)
|
|
16
|
How do I make the control read only
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ReadOnly = .t.
oPropertiesList.Select(oPropertiesList)
|
|
15
|
How do I show or hide the read only members
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowReadOnly = .f.
oPropertiesList.Select(oPropertiesList)
|
|
14
|
How do I show or hide the grid lines
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HasGridLines = 0
oPropertiesList.Select(oPropertiesList)
|
|
13
|
How do I hide the hierarchy lines
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HasLines = .f.
oPropertiesList.Select(oPropertiesList)
|
|
12
|
How can I add the horizontal scroll bar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ColumnAutoResize = .f.
oPropertiesList.HeaderVisible = .t.
oPropertiesList.Select(oPropertiesList)
|
|
11
|
How do I show or hide the control's header bar
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.HeaderVisible = .t.
oPropertiesList.Select(oPropertiesList)
|
|
10
|
How do I show or hide the objects members
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowObjects = .f.
oPropertiesList.Select(oPropertiesList)
|
|
9
|
How do I show or hide the restricted members
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowRestricted = .f.
oPropertiesList.Select(oPropertiesList)
|
|
8
|
How do I show or hide the hidden members
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ShowHidden = .f.
oPropertiesList.Select(oPropertiesList)
|
|
7
|
How do I browse or select an object
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.Select(oPropertiesList)
|
|
6
|
How do I change the control's foreground color
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.ForeColor = 7864440
oPropertiesList.Select(oPropertiesList)
|
|
5
|
How do I change the control's background color
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BackColor = 13158600
|
|
4
|
How do change the visual appearance for the control's border, using EBN
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oPropertiesList.BorderStyle = 16777216 '1000000 +
oPropertiesList.BackColor = 16777215
|
|
3
|
How do I remove the control's border
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.BorderStyle = 0
|
|
2
|
How do I change the height of the description part in the bottom side of the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.DescriptionHeight = 100
|
|
1
|
How do I hide or show the description part in the bottom side of the control
Dim oPropertiesList as P
oPropertiesList = topparent:CONTROL_ACTIVEX1.activex
oPropertiesList.DescriptionVisible = .f.
|